home *** CD-ROM | disk | FTP | other *** search
/ Electronic Clipper 1998 July / Electronic Clipper 1998-07.iso / Idea Source® / Main.Dir / 00005_Script_go the frame < prev    next >
Text File  |  1998-05-20  |  727b  |  36 lines
  1. on exitFrame
  2.   
  3.   go the frame
  4.   
  5.   repeat with n=8 to 12
  6.     if rollover(n) then
  7.       set the visible of sprite n to false
  8.       updatestage
  9.     end if
  10.   end repeat
  11.   
  12.   repeat with n=8 to 12
  13.     if not rollover(n) then
  14.       set the visible of sprite n to true
  15.       updatestage
  16.     end if
  17.   end repeat
  18.   
  19.   repeat with n=13 to 19
  20.     if rollover(n) then
  21.       set the visible of sprite n to false
  22.       set the visible of sprite (n + 15) to true
  23.       updatestage
  24.     end if
  25.   end repeat
  26.   
  27.   repeat with n=13 to 19
  28.     if not rollover(n) then
  29.       set the visible of sprite n to true
  30.       set the visible of sprite (n + 15) to false   
  31.       updatestage
  32.     end if
  33.   end repeat
  34.   
  35. end
  36.